home *** CD-ROM | disk | FTP | other *** search
/ .net - The Best of 1999/2000 / netCD Special01.iso / pc / Software / My Domain / md1setup.exe / Setup.sss < prev   
Encoding:
Text File  |  1999-08-13  |  1.3 KB  |  35 lines

  1. SET APPTITLE TO My Domain
  2. SET PROGFILES TO HKLM, Software\Microsoft\Windows\CurrentVersion, ProgramFilesDir, C:
  3. SET PROGMENU TO HKCU, Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders, Programs
  4. SET DESKTOP TO HKCU, Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders, Desktop
  5. SET INSTALLDIR TO %PROGFILES%\%APPTITLE%
  6. SET PROGGRP TO %APPTITLE%
  7. :GetInstallDir
  8. SET RESULT TO ASKDIR, "%INSTALLDIR%", Select Directory, "Please, select a folder for %APPTITLE%
  9. IF %RESULT%=CANCEL
  10.     SET RESULT TO ASK, Setup, Are you sure to cancel installation?
  11.     IF %RESULT%=YES
  12.         ABORT
  13.     ELSE
  14.         GOTO GetInstallDir
  15.     END
  16. END
  17. SET INSTALLDIR TO %RESULT%
  18. :GetProgGroup
  19. SET RESULT TO ASKGRP, %PROGGRP%, Select Program Group, "Please, select a program group for %APPTITLE%"
  20. IF %RESULT%=CANCEL
  21.     SET RESULT TO ASK, Setup, Are you sure to cancel installation?
  22.     IF %RESULT%=YES
  23.         ABORT
  24.     ELSE
  25.         GOTO GetProgGroup
  26.     END
  27. END
  28. SET PROGGRP TO %RESULT%
  29. SET SSETUPFOLDER TO %INSTALLDIR%\Setup
  30. SET UNINSTALL TO TRUE
  31. COPY MyDomain.exe TO %INSTALLDIR%
  32. LINK My Domain v1.00,  %INSTALLDIR%\MyDomain.exe,  %DESKTOP%
  33. LINK My Domain v1.00,  %INSTALLDIR%\MyDomain.exe,  %PROGMENU%\%PROGGRP%
  34. LINK Uninstall %APPTITLE%, %SSETUPFOLDER%\Setup.exe, %PROGMENU%\%PROGGRP%,-u %SSETUPFOLDER%\Uninstall.sss
  35.